object FormSuppliers: TFormSuppliers
  Left = 0
  Top = 0
  Caption = #20379#24212#21830#20449#24687
  ClientHeight = 592
  ClientWidth = 1007
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Visible = True
  PixelsPerInch = 96
  TextHeight = 13
  object dxLayoutControl1: TdxLayoutControl
    Left = 0
    Top = 0
    Width = 1007
    Height = 592
    Align = alClient
    TabOrder = 0
    AutoSize = True
    object EditID: TEdit
      Left = 53
      Top = 12
      Width = 83
      Height = 21
      BorderStyle = bsNone
      TabOrder = 0
    end
    object EditName: TEdit
      Left = 187
      Top = 12
      Width = 115
      Height = 21
      BorderStyle = bsNone
      TabOrder = 1
    end
    object ButtonQuery: TButton
      Left = 310
      Top = 10
      Width = 75
      Height = 25
      Caption = #26597#35810
      TabOrder = 2
      OnClick = ButtonQueryClick
    end
    object cxGrid1: TcxGrid
      Left = 10
      Top = 41
      Width = 1032
      Height = 480
      Align = alClient
      TabOrder = 6
      object cxGrid1DBTableView1: TcxGridDBTableView
        DataController.DataSource = UniDataSourceSuppliers
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        object cxGrid1DBTableView1SupplierID: TcxGridDBColumn
          Caption = #20379#24212#21830#32534#21495
          DataBinding.FieldName = 'SupplierID'
          Options.Editing = False
          Width = 71
        end
        object cxGrid1DBTableView1Name: TcxGridDBColumn
          Caption = #20379#24212#21830#21517#31216'*'
          DataBinding.FieldName = 'Name'
          Width = 161
        end
        object cxGrid1DBTableView1CorporateName: TcxGridDBColumn
          Caption = #20844#21496#21517#31216
          DataBinding.FieldName = 'CorporateName'
        end
        object cxGrid1DBTableView1Category: TcxGridDBColumn
          Caption = #31867#21035
          DataBinding.FieldName = 'Category'
          PropertiesClassName = 'TcxLookupComboBoxProperties'
          Properties.DropDownAutoSize = True
          Properties.DropDownSizeable = True
          Properties.KeyFieldNames = 'SupplierCategoryID'
          Properties.ListColumns = <
            item
              Caption = #21517#31216
              FieldName = 'Name'
            end
            item
              Caption = #22791#27880
              FieldName = 'Remark'
            end>
          Properties.ListSource = UniDataSourceCategories
          Width = 74
        end
        object cxGrid1DBTableView1Address: TcxGridDBColumn
          Caption = #22320#22336
          DataBinding.FieldName = 'Address'
        end
        object cxGrid1DBTableView1Phone: TcxGridDBColumn
          Caption = #30005#35805
          DataBinding.FieldName = 'Phone'
          Width = 104
        end
        object cxGrid1DBTableView1Email: TcxGridDBColumn
          Caption = #37038#31665
          DataBinding.FieldName = 'Email'
          Width = 153
        end
        object cxGrid1DBTableView1Contact: TcxGridDBColumn
          Caption = #32852#31995#20154
          DataBinding.FieldName = 'Contact'
          Width = 157
        end
        object cxGrid1DBTableView1BankAccount: TcxGridDBColumn
          Caption = #38134#34892#36134#21495
          DataBinding.FieldName = 'BankAccount'
          PropertiesClassName = 'TcxLookupComboBoxProperties'
          Properties.DropDownAutoSize = True
          Properties.DropDownSizeable = True
          Properties.KeyFieldNames = 'BankID'
          Properties.ListColumns = <
            item
              Caption = #36134#21495
              FieldName = 'AccountID'
            end
            item
              Caption = #24320#25143#21517#31216
              FieldName = 'AccountName'
            end>
          Properties.ListSource = UniDataSourceBanks
          Width = 158
        end
        object cxGrid1DBTableView1Remark: TcxGridDBColumn
          Caption = #22791#27880
          DataBinding.FieldName = 'Remark'
        end
      end
      object cxGrid1Level1: TcxGridLevel
        GridView = cxGrid1DBTableView1
      end
    end
    object DBNavigator1: TDBNavigator
      Left = 548
      Top = 10
      Width = 250
      Height = 25
      DataSource = UniDataSourceSuppliers
      Kind = dbnHorizontal
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
    end
    object CheckBoxModify: TCheckBox
      Left = 472
      Top = 10
      Width = 70
      Height = 25
      Caption = #32534#36753#27169#24335
      TabOrder = 4
      OnClick = CheckBoxModifyClick
    end
    object ButtonExport: TButton
      Left = 391
      Top = 10
      Width = 75
      Height = 25
      Caption = #23548#20986
      TabOrder = 3
      OnClick = ButtonExportClick
    end
    object dxLayoutGroup1: TdxLayoutGroup
      AlignHorz = ahClient
      AlignVert = avClient
      ButtonOptions.Buttons = <>
      Hidden = True
      ShowBorder = False
      Index = -1
    end
    object dxLayoutGroup2: TdxLayoutGroup
      AlignHorz = ahClient
      CaptionOptions.Text = 'Hidden Group'
      Parent = dxLayoutGroup1
      ButtonOptions.Buttons = <>
      Hidden = True
      LayoutDirection = ldHorizontal
      ShowBorder = False
      Index = 0
    end
    object dxLayoutItem1: TdxLayoutItem
      CaptionOptions.Text = #32534#21495#65306
      Parent = dxLayoutGroup2
      Control = EditID
      Index = 0
    end
    object dxLayoutControl1Item2: TdxLayoutItem
      CaptionOptions.Text = #21517#31216#65306
      Parent = dxLayoutGroup2
      Control = EditName
      Index = 1
    end
    object dxLayoutControl1Item5: TdxLayoutItem
      CaptionOptions.Text = 'ButtonQuery'
      CaptionOptions.Visible = False
      Parent = dxLayoutGroup2
      Control = ButtonQuery
      ControlOptions.ShowBorder = False
      Index = 2
    end
    object dxLayoutControl1Item8: TdxLayoutItem
      AlignHorz = ahClient
      AlignVert = avClient
      CaptionOptions.Visible = False
      Parent = dxLayoutGroup1
      Control = cxGrid1
      ControlOptions.ShowBorder = False
      Index = 1
    end
    object dxLayoutControl1Item10: TdxLayoutItem
      CaptionOptions.Text = 'DBNavigator1'
      CaptionOptions.Visible = False
      Parent = dxLayoutGroup2
      Control = DBNavigator1
      ControlOptions.AutoColor = True
      ControlOptions.ShowBorder = False
      Index = 5
    end
    object dxLayoutControl1Item7: TdxLayoutItem
      CaptionOptions.Text = 'CheckBox1'
      CaptionOptions.Visible = False
      Parent = dxLayoutGroup2
      Control = CheckBoxModify
      ControlOptions.AutoColor = True
      ControlOptions.ShowBorder = False
      Index = 4
    end
    object dxLayoutControl1Item1: TdxLayoutItem
      CaptionOptions.Text = 'Button1'
      CaptionOptions.Visible = False
      Parent = dxLayoutGroup2
      Control = ButtonExport
      ControlOptions.ShowBorder = False
      Index = 3
    end
  end
  object UniDataSourceSuppliers: TUniDataSource
    DataSet = UniQuerySuppliers
    Left = 208
    Top = 128
  end
  object UniQuerySuppliers: TUniQuery
    Connection = DataModule1.UniConnection1
    SQL.Strings = (
      'select * from Suppliers')
    ReadOnly = True
    Left = 48
    Top = 128
  end
  object UniTableCategories: TUniTable
    TableName = 'SupplierCategories'
    ReadOnly = True
    Connection = DataModule1.UniConnection1
    Left = 48
    Top = 184
  end
  object UniDataSourceCategories: TUniDataSource
    DataSet = UniTableCategories
    Left = 208
    Top = 184
  end
  object ActionList1: TActionList
    Left = 552
    Top = 216
    object ActionEsc: TAction
      Caption = 'ActionEsc'
      ShortCut = 27
      OnExecute = ActionEscExecute
    end
  end
  object UniTableBanks: TUniTable
    TableName = 'Banks'
    Connection = DataModule1.UniConnection1
    Left = 48
    Top = 240
  end
  object UniDataSourceBanks: TUniDataSource
    DataSet = UniTableBanks
    Left = 200
    Top = 240
  end
  object SaveDialog1: TSaveDialog
    Filter = 'Excel|*.xls|Text|*.txt|HTML|*.htm|XML|*.xml'
    Title = #23548#20986
    Left = 464
    Top = 264
  end
end
